package com.qd.panda.service.func;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.plugins.pagination.Page;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.core.weixinmanager.domain.QrDTO;
import com.cdqidi.core.weixinmanager.service.wx.WxaApiService;
import com.cdqidi.core.weixinmanager.util.CallWxUtil;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.ApiResultWrapper;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.RedisTemplateUtil;
import com.cdqidi.util.SpringContextHolder;
import com.jfinal.springboot.weixin.annotation.ApiType;
import com.qd.common.panda.config.PandaParkConfigDTO;
import com.qd.common.panda.domain.entity.func.ChannelDTO;
import com.qd.common.panda.domain.entity.func.ChannelEnableDTO;
import com.qd.common.panda.domain.entity.func.ChannelFunDTO;
import com.qd.common.sys.enums.BaseTableEnum;
import com.qd.panda.mapper.func.ChannelFunMapper;
import com.qd.panda.model.Channel;
import com.qd.panda.model.ChannelFun;
import com.qd.system.service.dict.MbUtil;
import com.qd.system.util.FileConfirmUtil;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import javax.annotation.Resource;
import javax.validation.constraints.NotBlank;
import java.io.File;
import java.util.Arrays;
import java.util.Collections;
import java.util.List;
import java.util.Optional;

import static java.util.stream.Collectors.toList;

/**
 * 功能
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class ChannelFunService extends BaseService<ChannelFunMapper, ChannelFun> {

    private static final String PREFIX_ID = "panda_channel_fun_funcId_{0}";

    private final RedisTemplateUtil<ChannelFun> redisTemplateUtil;

    private final PandaParkConfigDTO pandaParkConfig;

    private final ChannelService channelService;

    @Resource
    private WxaApiService wxaApiService;

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ChannelFunDTO save(ChannelFunDTO dto) {
        validator(dto);
        dto.setQrCode(createQrCode(dto.getFuncUrl(), dto.getFuncId()));
        final ChannelFun model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }

    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ChannelFunDTO update(ChannelFunDTO dto, boolean createQrCode) {
        validator(dto);
        if (createQrCode) {
            dto.setQrCode(createQrCode(dto.getFuncUrl(), dto.getFuncId()));
        } else {
            dto.setQrCode(null);
        }
        final ChannelFun historyModel = Optional.ofNullable(getById(dto.getFuncId())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final ChannelFun model = dtoToModel(dto);
        try {
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 删除，单个
     *
     * @param funcId 主键
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(String funcId) {
        final ChannelFun historyModel = Optional.ofNullable(getById(funcId)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(funcId)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<String> ids) {
        final List<ChannelFun> historyModelList = checkIds(ids);
        try {
            if (!super.removeByIds(ids)) {
                throw new ApiException("批量删除失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
        }
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(ChannelFunDTO dto) {
        final QueryWrapper<ChannelFun> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param funcId 主键
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(String funcId) {
        boolean exists = false;
        if (StringUtils.hasLength(funcId)) {
            final ChannelFun model = getById(funcId);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param funcId 主键
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public ChannelFun getById(String funcId) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, funcId);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(funcId), ChannelFun.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param funcId 主键
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ChannelFunDTO getByIdDto(String funcId) {
        return Optional.ofNullable(getById(funcId)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public ChannelFun getOne(ChannelFunDTO dto) {
        final QueryWrapper<ChannelFun> queryWrapper = createQueryWrapper(dto);
        ChannelFun model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ChannelFunDTO getOneDto(ChannelFunDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    @Transactional(readOnly = true)
    public List<ChannelFun> getList(ChannelFunDTO dto) {
        final QueryWrapper<ChannelFun> queryWrapper = createQueryWrapper(dto);
        final List<ChannelFun> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<ChannelFunDTO> getListDto(ChannelFunDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 分页数据
     *
     * @param page 分页对象
     * @param dto  查询参数
     * @return 分页信息
     */
    @Transactional(readOnly = true)
    public IPage<ChannelFunDTO> page(Page<ChannelFun> page, ChannelFunDTO dto) {
        final QueryWrapper<ChannelFun> queryWrapper = createQueryWrapper(dto);
        Page<ChannelFun> iPage = baseMapper.selectPage(page, queryWrapper);
        Optional.ofNullable(iPage.getRecords()).ifPresent(this::modelToDtoList);
        queryWrapper.clear();
        return iPage.convert(this::modelToDto);
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(ChannelFun model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getFuncId()));
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<ChannelFun> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getFuncId())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public ChannelFunDTO modelToDto(ChannelFun model) {
        if (null == model) {
            return null;
        }
        final ChannelFunDTO dto = new ChannelFunDTO();
        dto.setFuncId(model.getFuncId());
        dto.setQrCode(model.getQrCode());
        dto.setAddTime(model.getAddTime());
        dto.setChannelCode(model.getChannelCode());
        dto.setFuncUrl(model.getFuncUrl());
        dto.setEnable(model.getEnable());
        buildDisplay(dto);
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public ChannelFun dtoToModel(ChannelFunDTO dto) {
        if (null == dto) {
            return null;
        }
        final ChannelFun model = new ChannelFun();
        model.setFuncId(dto.getFuncId());
        model.setQrCode(dto.getQrCode());
        model.setAddTime(dto.getAddTime());
        model.setChannelCode(dto.getChannelCode());
        model.setFuncUrl(dto.getFuncUrl());
        model.setEnable(dto.getEnable());
        return model;
    }

    /**
     * 码表转换
     *
     * @param dto 页面对象
     */
    public void buildDisplay(ChannelFunDTO dto) {
        if (StringUtils.hasLength(dto.getEnable())) {
            dto.setEnableDisplay(MbUtil.idToDisplay(dto.getEnable()));
        }
        if (StringUtils.hasLength(dto.getFuncUrl())) {
            dto.setFuncUrlDisplay(MbUtil.idToDisplay(dto.getFuncUrl()));
        }
        if (StringUtils.hasLength(dto.getChannelCode())) {
            dto.setChannelCodeDisplay(channelService.idToDisplay(dto.getChannelCode()));
        }
        if (StringUtils.hasLength(dto.getQrCode())) {
            String name = dto.getChannelCodeDisplay() + "_" + dto.getFuncUrlDisplay() + ".jpg";
            dto.setQrCodeDisplay(FileConfirmUtil.getFilePath("qrPath" + File.separator + dto.getQrCode(), name));
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<ChannelFunDTO> modelToDtoList(List<ChannelFun> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<ChannelFun> dtoToModelList(List<ChannelFunDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<ChannelFun> createQueryWrapper(ChannelFunDTO dto) {
        final QueryWrapper<ChannelFun> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(dto.getChannelCode())) {
                queryWrapper.eq("channel_code", dto.getChannelCode());
            }
            if (StringUtils.hasLength(dto.getFuncUrl())) {
                queryWrapper.eq("func_url", dto.getFuncUrl());
            }
            if (StringUtils.hasLength(dto.getEnable())) {
                queryWrapper.eq("enable", dto.getEnable());
            }
        }
        queryWrapper.orderByDesc("add_time");
        queryWrapper.orderByAsc("channel_code");
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<ChannelFun> checkIds(List<String> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<ChannelFun> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<String> dbIds = list.stream().map(ChannelFun::getFuncId).collect(toList());
        final List<String> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    public void validator(ChannelFunDTO dto) {
        if (MbUtil.isNotExists(dto.getEnable(), BaseTableEnum.SF)) {
            throw new ApiException("是否启用值错误");
        }
        if (MbUtil.isNotExists(dto.getFuncUrl(), BaseTableEnum.FUNC_URL)) {
            throw new ApiException("小程序功能地址值错误");
        }
        Channel channel = channelService.getById(dto.getChannelCode());
        if (null == channel) {
            throw new ApiException("渠道编码值错误");
        }
        if (channel.getEnable().equals(ConstantDto.SF0)) {
            throw new ApiException("渠道未启用");
        }
    }

    private String createQrCode(String funcUrl, String funcId) {
        final String activeProfile = SpringContextHolder.getActiveProfile();
        final String appId = pandaParkConfig.getDefaultMiniProgramAppId();
        if (!StringUtils.hasLength(appId)) {
            throw new ApiException("默认小程序ID不能为空，生成葵花码异常");
        }
        String[] split = funcUrl.split("\\?");
        String url = split[0];
        String params = "";
        if (split.length == 2) {
            params = split[1];
        }
        if (StringUtils.hasLength(params)) {
            params = params + "&c=" + funcId;
        } else {
            params = "c=" + funcId;
        }
        log.info("url: {},params: {}", url, params);
        String finalParams = params;
        return CallWxUtil.callInterface(appId, ApiType.WXA, () -> {
            QrDTO qrDTO = new QrDTO();
            ApiResultWrapper<Object> resultWrapper;
            if (activeProfile.equals(SpringContextHolder.PROFILE_OFFICIAL)) {
                //正式环境
                qrDTO.setScene(finalParams)
                        .setName(funcId)
                        .setAutoColor(true)
                        .setIsHyAline(false)
                        .setPage(url);
                resultWrapper = wxaApiService.getUnlimited(qrDTO);
            } else {
                qrDTO.setScene(finalParams)
                        .setName(funcId)
                        .setAutoColor(true)
                        .setIsHyAline(false)
                        .setPath(url);
                resultWrapper = wxaApiService.getQrCode(qrDTO);
            }
            log.info("生成葵花码,状态: {},msg: {}", resultWrapper.isSuccess(), resultWrapper.getMsg());
            if (resultWrapper.isSuccess()) {
                log.info(resultWrapper.getData().toString());
                return resultWrapper.getData().toString();
            } else {
                throw new ApiException(resultWrapper.getMsg());
            }
        });
    }

    @Transactional(rollbackFor = Exception.class)
    public void removeByChannelCode(String channelCode) {
        final QueryWrapper<ChannelFun> queryWrapper = new QueryWrapper<>();
        queryWrapper.eq("channel_code", channelCode);
        List<ChannelFun> list = super.baseMapper.selectList(queryWrapper);
        queryWrapper.clear();
        if (!list.isEmpty()) {
            for (ChannelFun channelFun : list) {
                removeById(channelFun.getFuncId());
            }
        }
    }

    @Transactional(rollbackFor = Exception.class)
    public void enable(ChannelEnableDTO dto) {
        if (MbUtil.isNotExists(dto.getEnable(), BaseTableEnum.SF)) {
            throw new ApiException("是否启用值错误");
        }
        for (String id : dto.getIds()) {
            ChannelFunDTO channelFunDTO = getByIdDto(id);
            if (null == channelFunDTO) {
                throw new ApiException("主键ID错误[" + id + "]");
            }
            if (!channelFunDTO.getEnable().equals(dto.getEnable())) {
                channelFunDTO.setEnable(dto.getEnable());
                update(channelFunDTO, false);
            }
            channelFunDTO.freeData();
        }
    }

    @Transactional(readOnly = true)
    public ChannelFunDTO getDetailAndAddLog(@NotBlank(message = "功能不能为空") String funcId) {
        ChannelFunDTO channelFunDTO = getByIdDto(funcId);
        if (null != channelFunDTO) {
            ChannelDTO channelDTO = channelService.getByIdDto(channelFunDTO.getChannelCode());
            if (null != channelDTO) {
                channelFunDTO.setChannel(channelDTO);
            }
        }
        return channelFunDTO;
    }
}